#drafted by Jeremy VanDerWal ( jjvanderwal@gmail.com ... www.jjvanderwal.com )
#GNU General Public License .. feel free to use / distribute ... no warranties

################################################################################
library(SDMTools)
library(adehabitat)

#define the working directory
work.dir = "/homes/34/ctbccr/tmp/"; setwd(work.dir)

bc01 = read.asc.gz('/homes/55/jc151355/AWT.BC.asc/bc01.asc.gz')


#create the images
cols = colorRampPalette(c('gray30','gray80','red','yellow','forestgreen'))(101)
png(paste('bc01.png',sep=''), width=7, height=7, units='cm', res=300, pointsize=5, bg='white')
	image(bc01,ann=FALSE,axes=FALSE,col=cols)
dev.off()


write.asc.gz(tas,paste(out.dir,tname,'.2.asc',sep='')) #write out the data

